home *** CD-ROM | disk | FTP | other *** search
- GetRect(VAR X1,Y1,X2,Y2 : REAL);
-
- Allows the user to create a rectangle using the mouse
-
- GetLine(VAR X1,Y1,X2,Y2 : REAL);
-
- Allows the user to create a line using the mouse
-
- GetPt(VAR X,Y : REAL);
-
- Returns X,Y coordinates by using the mouse. X,Y are not returned until the mouse is clicked
-
- GetPtL(X1,Y1 : REAL; VAR X2,Y2 : REAL);
-
- Draws a line from a fixed point specified by X1,Y1 to a mouse defined point. X2,Y2 are not returned until the mouse is clicked
-
- GetKeyDown(VAR aCode : INTEGER);
-
- Pauses until the user presses a keyboard key
-
-